<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in</name>
<id>-1</id>
<cardCount>3</cardCount>
<cardID>2873</cardID>
<listID>2170</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>512</width>
<height>342</height>
</cardSize>
<script>function itemsTolines stringif string = "" then return stringrepeat with i = 1 to the number of items in stringput item i of string into line i of outputStringend repeatreturn outputStringend itemsToLinesfunction lineOffset searchString,anyStringreturn number of lines of char 1 to offset(searchString,anyString)¬of anyStringend lineOffsetfunction stripSpaces anyStringreturn (word 1 to (number of words of anyString) of anyString)end stripSpacesfunction stripEmptyLines anyStringput empty into outputStringrepeat with i = 1 to the number of lines in anyStringif line i of anyString = "" then next repeatput line i of anyString & return after outputStringend repeatreturn outputStringend stripEmptyLinesfunction groupNumber groupNamereturn lineOffset("*" & groupName, cd fld "GroupSummary" of card "AOLConfigure")end groupNumber-- ScriptEdit™ Prefs:Monaco,9,47,24,472,600,893,893,50</script>
